﻿Public Class Pedido


    'Set y gets
    Public Property NombreCliente As Cliente
    Public Property FechaPedido As Date
    Public Property ListaProductos As Dictionary(Of String, Producto)
    Public Property PrecioPedido As Decimal

    Public Sub New(ByVal nombreCliente As Cliente, ByVal fechaPedido As Date, ByVal listaProductos As Dictionary(Of String, Producto), ByVal precioPedido As Decimal)
        _NombreCliente = nombreCliente
        _FechaPedido = fechaPedido
        _ListaProductos = listaProductos
        _PrecioPedido = precioPedido
    End Sub

End Class
